home *** CD-ROM | disk | FTP | other *** search
/ PD Collection CD 1 / PD Collection CD 1.iso / textual / tex / files / !tex / latexsty2 / HELETTER / sty
Encoding:
Text File  |  1990-01-16  |  11.0 KB  |  325 lines
  1. % heletter.sty 17-June-87
  2.  
  3. \typeout{Document Style 'AAMRL letterhead'. Released 17 June 1987}
  4.  
  5. \def\@ptsize{0} \@namedef{ds@11pt}{\def\@ptsize{1}}
  6. \@namedef{ds@12pt}{\def\@ptsize{2}} 
  7. \@twosidefalse
  8. \def\ds@draft{\overfullrule 5pt} 
  9. \@options
  10.  
  11. \lineskip 1pt \normallineskip 1pt
  12. \def\baselinestretch{1}
  13.  
  14. \ifcase \@ptsize\relax 
  15. \def\@normalsize{\@setsize\normalsize{12pt}\xpt\@xpt 
  16. \abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
  17. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt minus3pt}
  18. \def\small{\@setsize\small{11pt}\ixpt\@ixpt
  19. \abovedisplayskip 8.5pt plus 3pt minus 4pt\belowdisplayskip \abovedisplayskip
  20. \abovedisplayshortskip \z@ plus2pt\belowdisplayshortskip 4pt plus2pt minus 2pt}
  21. \def\footnotesize{\@setsize\footnotesize{9.5pt}\viiipt\@viiipt
  22. \abovedisplayskip 6pt plus 2pt minus 4pt\belowdisplayskip \abovedisplayskip
  23. \abovedisplayshortskip \z@ plus 1pt\belowdisplayshortskip 3pt plus 1pt minus
  24. 2pt}
  25. \def\scriptsize{\@setsize\scriptsize{8pt}\viipt\@viipt}
  26. \def\tiny{\@setsize\tiny{6pt}\vpt\@vpt}
  27. \def\large{\@setsize\large{14pt}\xiipt\@xiipt}
  28. \def\Large{\@setsize\Large{18pt}\xivpt\@xivpt}
  29. \def\LARGE{\@setsize\LARGE{22pt}\xviipt\@xviipt}
  30. \def\huge{\@setsize\huge{25pt}\xxpt\@xxpt}
  31. \def\Huge{\@setsize\Huge{30pt}\xxvpt\@xxvpt}
  32. \or 
  33. \def\@normalsize{\@setsize\normalsize{13.6pt}\xipt\@xipt
  34. \abovedisplayskip 11pt plus3pt minus6pt\belowdisplayskip \abovedisplayskip
  35. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
  36. minus3pt}
  37. \def\small{\@setsize\small{12pt}\xpt\@xpt
  38. \abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
  39. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt minus3pt}
  40. \def\footnotesize{\@setsize\footnotesize{11pt}\ixpt\@ixpt
  41. \abovedisplayskip 8pt plus 2pt minus 4pt\belowdisplayskip \abovedisplayskip
  42. \abovedisplayshortskip \z@ plus 1pt\belowdisplayshortskip 4pt plus 2pt minus
  43. 2pt}
  44. \def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}
  45. \def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}
  46. \def\large{\@setsize\large{14pt}\xiipt\@xiipt}
  47. \def\Large{\@setsize\Large{18pt}\xivpt\@xivpt}
  48. \def\LARGE{\@setsize\LARGE{22pt}\xviipt\@xviipt}
  49. \def\huge{\@setsize\huge{25pt}\xxpt\@xxpt}
  50. \def\Huge{\@setsize\Huge{30pt}\xxvpt\@xxvpt}
  51. \or 
  52. \def\@normalsize{\@setsize\normalsize{15pt}\xiipt\@xiipt
  53. \abovedisplayskip 12pt plus3pt minus7pt\belowdisplayskip \abovedisplayskip
  54. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
  55. minus3pt}
  56. \def\small{\@setsize\small{13.6pt}\xipt\@xipt
  57. \abovedisplayskip 11pt plus3pt minus6pt\belowdisplayskip \abovedisplayskip
  58. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
  59. minus3pt}
  60. \def\footnotesize{\@setsize\footnotesize{12pt}\xpt\@xpt
  61. \abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
  62. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt minus3pt}
  63. \def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}
  64. \def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}
  65. \def\large{\@setsize\large{18pt}\xivpt\@xivpt}
  66. \def\Large{\@setsize\Large{22pt}\xviipt\@xviipt}
  67. \def\LARGE{\@setsize\LARGE{25pt}\xxpt\@xxpt}
  68. \def\huge{\@setsize\huge{30pt}\xxvpt\@xxvpt}
  69. \let\Huge=\huge
  70. \fi
  71. \normalsize 
  72.  
  73. \oddsidemargin 5pt \evensidemargin 5pt \marginparwidth 90pt \marginparsep
  74. 11pt \marginparpush 5pt 
  75.  \topmargin 0pt \headheight 6pt \headsep 2pt \footheight 12pt \footskip
  76. 25pt 
  77. \textheight 7.5in \textwidth 6.5in \columnsep 10pt \columnseprule 0pt 
  78. \raggedbottom 
  79. \footnotesep 12pt \skip\footins 10pt plus 2pt minus 4pt 
  80. \floatsep 12pt plus 2pt minus 2pt
  81. \textfloatsep 20pt plus 2pt minus 4pt
  82. \intextsep 12pt plus 2pt minus 2pt
  83. \dblfloatsep 12pt plus 2pt minus 2pt
  84. \dbltextfloatsep 20pt plus 2pt minus 4pt
  85. \@maxsep 20pt
  86. \@dblmaxsep 20pt
  87. \@fptop 0pt plus 1fil
  88. \@fpsep 8pt plus 2fil
  89. \@fpbot 0pt plus 1fil
  90. \@dblfptop 0pt plus 1fil
  91. \@dblfpsep 8pt plus 2fil
  92. \@dblfpbot 0pt plus 1fil
  93.  
  94.  
  95. \newdimen\longindentation
  96. \longindentation=.5\textwidth
  97. \newdimen\indentedwidth
  98. \indentedwidth=\textwidth
  99. \advance\indentedwidth -\longindentation
  100.  
  101. \def\opening#1{\ifx\@empty\fromaddress
  102.  \thispagestyle{firstpage} 
  103.  {\raggedleft\today\par}
  104.  \else \thispagestyle{empty} 
  105.  {\raggedright\ignorespaces\fromaddress\\
  106. {\vspace*{-1.3\parskip}\hspace*{.75\textwidth}\today} \\*[\parskip]
  107.  \fromsubject \\*[\parskip] \par}
  108.  \fi
  109.  \vspace{2\parskip}
  110.  {\raggedright \toname \\ \toaddress \par}\vspace{2\parskip}
  111.  #1\par\nobreak}
  112. \long\def\closing#1{\par\nobreak\vspace{\parskip}
  113.  \stopbreaks
  114.  \noindent
  115.  \ifx\@empty\fromaddress\else
  116.  \hspace*{\longindentation}\fi
  117.  \parbox{\indentedwidth}{\raggedright
  118.  \ignorespaces #1\\[6\parskip]
  119.  \ifx\@empty\fromsig 
  120.  \fromname
  121.  \else \fromsig \fi\strut}
  122.  \par}
  123.  
  124. \def\ps{\par\startbreaks}
  125. \def\cc#1{\par\noindent
  126. \parbox[t]{\textwidth}{\@hangfrom{\rm cc: }\ignorespaces #1\strut}\par}
  127. \def\encl#1{\par\noindent
  128. \parbox[t]{\textwidth}{\@hangfrom{\rm encl: }\ignorespaces #1\strut}\par}
  129. \def\stopletter{}
  130.  
  131. \def\returnaddress{}
  132. \newcount\labelcount
  133.  
  134. \def\startlabels{\labelcount=0 \baselineskip=0pt \lineskip=0pt
  135. \pagestyle{empty}
  136. \let\@texttop=\relax
  137. \topmargin -50pt
  138. \headsep 0pt
  139. \oddsidemargin -35pt
  140. \evensidemargin -35pt
  141. \textheight 10in
  142. \@colht\textheight \@colroom\textheight \vsize\textheight
  143. \textwidth 550pt
  144. \columnsep 25pt
  145. \xpt
  146. \baselineskip=0pt
  147. \lineskip=0pt
  148. \boxmaxdepth=0pt
  149. \twocolumn\relax}
  150. \def\mlabel#1#2{\setbox0\vbox{\parbox[b]{3.6in}{\strut\ignorespaces #2}}
  151.  \vbox to 2in{\vss \box0 \vss}}
  152.  
  153.  
  154.  
  155. \long\def\letter#1{\newpage
  156.  \c@page\@ne
  157.  \interlinepenalty=200 \@processto{#1}}
  158. \def\endletter{\stopletter\@@par\pagebreak\@@par
  159.  \if@filesw 
  160.  \begingroup 
  161.  \def\protect{\string}
  162.  \let\\=\relax
  163.  \def\protect##1{\string##1\space}
  164.  \immediate\write\@auxout{\string\mlabel{\returnaddress}{\toname
  165.  \\\toaddress}}
  166.  \endgroup 
  167.  \fi}
  168. \long\def\@processto#1{\@xproc #1\\@@@\ifx\toaddress\@empty 
  169.  \else \@yproc #1@@@\fi}
  170. \long\def\@xproc #1\\#2@@@{\def\toname{#1}\def\toaddress{#2}}
  171. \long\def\@yproc #1\\#2@@@{\def\toaddress{#2}}
  172. \def\stopbreaks{\interlinepenalty \@M
  173.  \def\par{\@@par\nobreak}\let\\=\@nobreakcr
  174.  \let\vspace\@nobreakvspace}
  175. \def\@nobreakvspace{\@ifstar{\@nobreakvspacex}{\@nobreakvspacex}}
  176. \def\@nobreakvspacex#1{\ifvmode\nobreak\vskip #1\relax\else
  177.  \@bsphack\vadjust{\nobreak\vskip #1}\@esphack\fi}
  178. \def\@nobreakcr{\vadjust{\penalty\@M}\@ifstar{\@xnewline}{\@xnewline}}
  179. \def\startbreaks{\let\\=\@normalcr
  180.  \interlinepenalty 200\def\par{\@@par\penalty 200}}
  181. \def\name#1{\def\fromname{#1}}
  182. \def\signature#1{\def\fromsig{#1}}
  183. \def\fromsig{}
  184. \long\def\address#1{\def\fromaddress{#1}}
  185. \def\fromaddress{}
  186. \def\subject#1{\def\fromsubject{#1}}
  187. \def\fromsubject{}
  188. \def\location#1{\def\fromlocation{#1}}
  189. \def\fromlocation{}
  190. \def\telephone#1{\def\telephonenum{#1}}
  191. \def\telephonenum{}
  192. \def\document{\endgroup
  193.  \@colht\textheight \@colroom\textheight \vsize\textheight
  194.  \columnwidth\textwidth \@clubpenalty\clubpenalty
  195.  \if@twocolumn \advance\columnwidth -\columnsep 
  196.  \divide\columnwidth\tw@ \hsize\columnwidth \@firstcolumntrue 
  197.  \fi
  198.  \hsize\columnwidth \linewidth\hsize
  199.  \begingroup\@floatplacement\@dblfloatplacement\endgroup
  200.  \if@filesw \immediate\openout\@mainaux=\jobname.aux
  201.  \immediate\write\@mainaux{\string\startlabels\string\@startlabels}\fi
  202.  \def\do##1{\let ##1\@notprerr}
  203.  \@preamblecmds
  204.  \let\do\noexpand 
  205.  \@normalsize\everypar{}}
  206. \def\enddocument{\@checkend{document}\newpage\begingroup 
  207. \if@filesw \immediate\closeout\@mainaux 
  208. \makeatletter\input \jobname.aux\clearpage
  209. \fi\endgroup\deadcycles\z@\@@end}
  210.  
  211. \def\makelabels{\@fileswtrue}
  212. \def\@startlabels{}
  213.  
  214.  
  215.  
  216. \def\@texttop{\ifnum\c@page=1\vskip 0pt plus .00006fil\relax\fi}
  217. \def\ps@headings{\def\@oddhead{\sl To \ignorespaces\toname \hfil \today
  218.  \hfil Page \thepage}\def\@oddfoot{}}
  219. \def\ps@empty{\def\@oddhead{}\def\@oddfoot{}\def\@evenhead{}\def\@evenfoot{}}
  220.  
  221. \def\ps@firstpage{\def\@oddhead{}\def\@oddfoot{\raisebox
  222.  {-45pt}[0pt]{\hbox to \textwidth
  223.  {\hspace*{100pt}\xpt\fromlocation \hfill
  224. \telephonenum}}\hss}\def\@evenhead{}\def\@evenfoot{}}
  225. \def\ps@plain{\def\@oddhead{}\def\@oddfoot{\rm\hfil\thepage
  226.  \hfil}\def\@evenhead{}\let\@evenfoot\@oddfoot}
  227.  
  228. \parskip .7em \parindent 0pt \topsep .4em \partopsep 0pt \itemsep .4em 
  229. \@lowpenalty 51 \@medpenalty 151 \@highpenalty 301 
  230. \@beginparpenalty -\@lowpenalty \@endparpenalty -\@lowpenalty \@itempenalty
  231. -\@lowpenalty 
  232.  
  233.  
  234.  
  235. \leftmargini 2.5em
  236. \leftmarginii 2.2em \leftmarginiii 1.87em \leftmarginiv 1.7em \leftmarginv 1em
  237. \leftmarginvi 1em
  238. \leftmargin\leftmargini
  239. \labelwidth\leftmargini\advance\labelwidth-\labelsep
  240. \labelsep 5pt
  241. \parsep 0pt
  242. \let\@listi\relax
  243. \def\@listii{\leftmargin\leftmarginii
  244.  \labelwidth\leftmarginii\advance\labelwidth-\labelsep}
  245. \def\@listiii{\leftmargin\leftmarginiii
  246.  \labelwidth\leftmarginiii\advance\labelwidth-\labelsep
  247.  \topsep .2em 
  248.  \itemsep \topsep}
  249. \def\@listiv{\leftmargin\leftmarginiv
  250.  \labelwidth\leftmarginiv\advance\labelwidth-\labelsep}
  251. \def\@listv{\leftmargin\leftmarginv
  252.  \labelwidth\leftmarginv\advance\labelwidth-\labelsep}
  253. \def\@listvi{\leftmargin\leftmarginvi
  254.  \labelwidth\leftmarginvi\advance\labelwidth-\labelsep}
  255.  
  256. \def\labelenumi{\arabic{enumi}.} 
  257. \def\theenumi{\arabic{enumi}} 
  258. \def\labelenumii{(\alph{enumii})}
  259. \def\theenumii{\alph{enumii}}
  260. \def\p@enumii{\theenumi}
  261. \def\labelenumiii{\roman{enumiii}.}
  262. \def\theenumiii{\roman{enumiii}}
  263. \def\p@enumiii{\theenumi(\theenumii)}
  264. \def\labelenumiv{\Alph{enumiv}.}
  265. \def\theenumiv{\Alph{enumiv}} 
  266. \def\p@enumiv{\p@enumiii\theenumiii}
  267.  
  268. \def\labelitemi{$\bullet$}
  269. \def\labelitemii{\bf --}
  270. \def\labelitemiii{$\ast$}
  271. \def\labelitemiv{$\cdot$}
  272. \def\verse{\let\\=\@centercr 
  273.  \list{}{\itemsep\z@ \itemindent -15pt\listparindent \itemindent 
  274.  \rightmargin\leftmargin\advance\leftmargin 15pt}\item[]}
  275. \let\endverse\endlist
  276. \def\quotation{\list{}{\listparindent 1.5em
  277.  \itemindent\listparindent
  278.  \rightmargin\leftmargin}\item[]}
  279. \let\endquotation=\endlist
  280. \def\quote{\list{}{\rightmargin\leftmargin}\item[]}
  281. \let\endquote=\endlist
  282.  
  283. \def\descriptionlabel#1{\hspace\labelsep \bf #1}
  284. \def\description{\list{}{\labelwidth\z@ \itemindent-\leftmargin
  285.  \let\makelabel\descriptionlabel}}
  286. \let\enddescription\endlist
  287.  
  288.  
  289.  
  290. \def\theequation{\arabic{equation}}
  291.  
  292. \arraycolsep 5pt \tabcolsep 6pt \arrayrulewidth .4pt \doublerulesep 2pt 
  293. \tabbingsep \labelsep 
  294. \skip\@mpfootins = \skip\footins
  295. \fboxsep = 3pt \fboxrule = .4pt 
  296.  
  297. \def\footnoterule{\kern-1\p@ 
  298.  \hrule width .4\columnwidth 
  299.  \kern .6\p@} 
  300.  
  301. \long\def\@makefntext#1{\noindent \hangindent 5pt\hbox 
  302.  to 5pt{\hss $^{\@thefnmark}$}#1}
  303.  
  304.  
  305. \c@topnumber=2
  306. \def\topfraction{.7}
  307. \c@bottomnumber=1
  308. \def\bottomfraction{.3}
  309. \c@totalnumber=3
  310. \def\textfraction{.2}
  311. \def\floatpagefraction{.5}
  312. \c@dbltopnumber= 2
  313. \def\dbltopfraction{.7}
  314. \def\dblfloatpagefraction{.5}
  315.  
  316. \def\today{\number\day\space\ifcase\month\or
  317.  January\or February\or March\or April\or May\or June\or
  318.  July\or August\or September\or October\or November\or December\fi
  319.  \space\number\year}
  320.  
  321.  
  322. \smallskipamount=.5\parskip \medskipamount=\parskip
  323. \bigskipamount=2\parskip
  324. \ps@plain \pagenumbering{arabic} \onecolumn \@fileswfalse 
  325.